home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 41.zip / BS1 part 41 / parallel-C disk .adf / trafo.c < prev    next >
C/C++ Source or Header  |  1997-12-31  |  603b  |  28 lines
  1. #include "linkio.c"
  2.  
  3. main()
  4. {
  5.    FILE *fp;
  6.    char fname[30],buffer[1];
  7.    long i;
  8.    printf("Programm zum Empfangen von Daten ueber Linkanschluss\n");
  9.    init_root();
  10.    reset_root();
  11.    printf("Bitte den Filenamen angeben:\n");
  12.    scanf("%s",fname);
  13.    fp=fopen(fname,"w");
  14.    if (fp==NULL) {
  15.       printf("File kann nicht angelegt werden\n");
  16.       exit(-1);
  17.    }
  18.         printf("waiting for sender ...\n");
  19.    i=long_word_from_link();
  20.    printf("Filelaenge %ld\n",i);
  21.    while((i--)>0L) {
  22.       buffer[0]=byte_from_link();
  23.       fwrite(buffer,1,1,fp);
  24.    }
  25.    fclose(fp);
  26.    printf("Fertig!!\n");
  27. }
  28.